mm-possibly-verify-or-decrypt should only issue errors when decrypting

* lisp/gnus/mm-decode.el (mm-possibly-verify-or-decrypt): Only do
the warning about failed decryption when we're handing encrypted
parts, not when doing verification.

diff --git a/lisp/gnus/mm-decode.el b/lisp/gnus/mm-decode.el
index 42bf5f8081cc9ae5321243fb35155831020c3d77..d9c14120c2f0741648ff51076f000400892c8f92 100644 (file)
--- a/lisp/gnus/mm-decode.el
+++ b/lisp/gnus/mm-decode.el
@@ -1745,6 +1745,7 @@ If RECURSIVE, search recursively."
     (let ((info (get-text-property 0 'gnus-info (car mm-security-handle))))
       (if (or (not info)
              (equal info "")
+             (equal subtype "encrypted")
              (member "OK" (split-string info "\n")))
          parts
        ;; We had an error during decryption.  Report what it is.